home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / kcl / akcl / kcl.lha / cmpnew / cmpvar.data < prev    next >
Text File  |  1986-06-26  |  4KB  |  154 lines
  1.           
  2. #(
  3. #!
  4. (lisp::in-package 'user::compiler)
  5. compiler::var
  6. compiler::c2var
  7. compiler::c2
  8. compiler::location
  9. compiler::c2location
  10. lisp::setq
  11. compiler::c1setq
  12. compiler::c1special
  13. compiler::c2setq
  14. lisp::progv
  15. compiler::c1progv
  16. compiler::c2progv
  17. lisp::psetq
  18. compiler::c1psetq
  19. compiler::c1
  20. compiler::c2psetq
  21. compiler::set-var
  22. compiler::set-loc
  23. compiler::wt-var
  24. compiler::wt-loc
  25. (lisp::defstruct compiler::var compiler::name compiler::kind compiler::ref compiler::ref-ccb compiler::loc (lisp::type lisp::t))
  26. system::defstruct-form
  27. system::is-a-structure
  28. ((compiler::name lisp::nil lisp::nil lisp::nil 0) (compiler::kind lisp::nil lisp::nil lisp::nil 1) (compiler::ref lisp::nil lisp::nil lisp::nil 2) (compiler::ref-ccb lisp::nil lisp::nil lisp::nil 3) (compiler::loc lisp::nil lisp::nil lisp::nil 4) (lisp::type lisp::t lisp::nil lisp::nil 5))
  29. system::structure-slot-descriptions
  30. system::structure-include
  31. system::structure-print-function
  32. system::structure-type
  33. system::structure-named
  34. compiler::var-name
  35. (compiler::var . 0)
  36. system::structure-access
  37. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::var 0 system::v))
  38. system::setf-lambda
  39. system::setf-update-fn
  40. system::setf-method
  41. system::setf-documentation
  42. compiler::var-kind
  43. (compiler::var . 1)
  44. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::var 1 system::v))
  45. compiler::var-ref
  46. (compiler::var . 2)
  47. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::var 2 system::v))
  48. compiler::var-ref-ccb
  49. (compiler::var . 3)
  50. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::var 3 system::v))
  51. compiler::var-loc
  52. (compiler::var . 4)
  53. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::var 4 system::v))
  54. compiler::var-type
  55. (compiler::var . 5)
  56. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::var 5 system::v))
  57. 6
  58. system::structure-offset
  59. (compiler::make-var)
  60. system::structure-constructors
  61. system::structure-documentation
  62. compiler::*vars*
  63. compiler::*undefined-vars*
  64. compiler::*special-binding*
  65. :name
  66. "The variable ~s is not a symbol."
  67. "The constant ~s is being bound."
  68. lisp::special
  69. compiler::cmp-type
  70. lisp::object
  71. compiler::lexical
  72. lisp::ignore
  73. "The variable ~s is not used."
  74. compiler::info
  75. :kind
  76. compiler::global
  77. :loc
  78. :type
  79. compiler::cb
  80. compiler::lb
  81. "The ignored variable ~s is used."
  82. compiler::clb
  83. lisp::fixnum
  84. lisp::character
  85. lisp::long-float
  86. lisp::short-float
  87. compiler::*compiler-output1*
  88. compiler::*safe-compile*
  89. compiler::*space*
  90. 2
  91. 1
  92. lisp::progn
  93. "No form was given for the value of ~s."
  94. "The variable ~s is not a symbol."
  95. "The constant ~s is being assigned a value."
  96. "Type mismatches between ~s and ~s."
  97. compiler::*value-to-go*
  98. compiler::*next-cvar*
  99. compiler::*unwind-exit*
  100. compiler::*vs*
  101. compiler::vs
  102. (lisp::member lisp::nil)
  103. "The variable ~s is not a symbol."
  104. "The constant ~s is being assigned a value."
  105. "No form was given for the value of ~s."
  106. 0
  107. (lisp::fixnum lisp::character lisp::long-float lisp::short-float lisp::object)
  108. compiler::make-var
  109. compiler::copy-var
  110. compiler::var-p
  111. compiler::c1make-var
  112. compiler::check-vref
  113. compiler::c1var
  114. compiler::c1vref
  115. compiler::c2var-kind
  116. compiler::sch-global
  117. compiler::c1add-globals
  118. compiler::c1setq1
  119. :ref
  120. :ref-ccb
  121. system::copy-structure
  122. compiler::cmperr
  123. compiler::add-symbol
  124. compiler::cmpwarn
  125. compiler::make-info
  126. compiler::undefined-variable
  127. compiler::type>=
  128. compiler::unwind-exit
  129. compiler::wt-ccb-vs
  130. compiler::wt-vs*
  131. compiler::wt-vs
  132. compiler::wt1
  133. compiler::replaced
  134. compiler::baboon
  135. compiler::wt-fixnum-loc
  136. compiler::wt-character-loc
  137. compiler::wt-long-float-loc
  138. compiler::wt-short-float-loc
  139. compiler::c1nil
  140. compiler::too-few-args
  141. compiler::c1expr
  142. compiler::add-info
  143. compiler::type-and
  144. compiler::copy-info
  145. compiler::c2expr*
  146. compiler::c1expr*
  147. compiler::c1progn*
  148. compiler::vs-push
  149. compiler::c2expr
  150. compiler::args-info-changed-vars
  151. compiler::args-info-referred-vars
  152. compiler::rep-type
  153. )
  154.